﻿Imports System.Linq.Expressions
Imports System.Data
Imports System.Data.SqlClient
Imports System.Data.Common
Imports System.Configuration

Public Class ControllerBase
    Inherits System.Web.Mvc.Controller

    Public Sub New()
        AppDomain.CurrentDomain.SetData("SQLServerCompactEditionUnderWebHosting", True)
    End Sub

    Public ReadOnly Property CurrentUserID As String
        Get
            Return DailyReportCommon.CurrentUserID
        End Get
    End Property
    Public ReadOnly Property CurrentUserName As String
        Get
            Return DailyReportCommon.CurrentUserName
        End Get
    End Property
    Public ReadOnly Property CurrentUserNum As String
        Get
            Return DailyReportCommon.CurrentUserNum
        End Get
    End Property
    Public ReadOnly Property CurrentDepartmentID As String
        Get
            Return DailyReportCommon.CurrentDepartmentID
        End Get
    End Property
    Public ReadOnly Property CurrentUserPermissions As Integer
        Get
            Return DailyReportCommon.CurrentUserPermissions
        End Get
    End Property



    'Public ReadOnly Property ReportEntity As ReportEntities
    '    Get
    '        Return  ReportEntities
    '    End Get
    'End Property

End Class

